home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Computer Life 1997 February
/
Computer Life February 1997.iso
/
S
/
VN
/
PRODUCT
/
VNOTES95.EXE
/
0
/
RCDATA
/
TFRMMAIN
/
TFRMMAIN.txt
< prev
Wrap
Text File
|
1996-07-07
|
14KB
|
333 lines
object frmMain: TfrmMain
Left = 9
Top = 83
HorzScrollBar.Visible = False
VertScrollBar.Visible = False
AutoScroll = False
ClientHeight = 325
ClientWidth = 258
Font.Color = clWindowText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = []
Icon.Data = {<image000.ico>}
KeyPreview = True
Menu = mnuMain
ShowHint = True
OnActivate = FormActivate
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnKeyUp = FormKeyUp
OnResize = FormResize
PixelsPerInch = 96
TextHeight = 13
object btnNew: TSpeedButton
Left = 6
Top = 15
Width = 30
Height = 30
Hint = 'Add a new note'
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Glyph.Data = {
06020000424D0602000000000000760000002800000028000000140000000100
0400000000009001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333333333333333
3333330000000000000033333333FFFFFFFFFFFF3333330FFFFFFFFFFFF03333
338F88888888888F3333330FFFFFFFFFFFF03333338F33333333333F3333330F
FFFFFFFFFFF03333338F33333333333F3333330FFFFFFFFFFFF03333338F3333
3333333F3333330FFFFFFFFFFFF03333338F33333333333F3333330FFFFFFFFF
FFF03333338F33333333333F3333330FFFFFFFFFFFF03333338F33333333333F
3333330FFFFFFFFFFFF03333338F33333333333F3333330FFFFFFFFFFFF03333
338F33333333333F3333330FFFFFFFFFFFF03333338F33333333FFFF3333330F
FFFFFFFFFFF03333338F33333338888F3333330FFFFFFFF000003333338F3333
3338F33F3333330FFFFFFFF0FF033333338F33333338F38F3333330FFFFFFFF0
F0333333338F3333333888F33333330FFFFFFFF003333333338FFFFFFFF88F33
3333330000000000333333333388888888883333333333333333333333333333
33333333333333333333}
Layout = blGlyphTop
NumGlyphs = 2
ParentFont = False
Spacing = 7
OnClick = btnNewClick
end
object btnOpen: TSpeedButton
Left = 37
Top = 15
Width = 30
Height = 30
Hint = 'Open a file as a note'
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Glyph.Data = {
06020000424D0602000000000000760000002800000028000000140000000100
0400000000009001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333333333333333333333333300000000000003333333888888888888F3
3333330B3B3B3B3B3B30333333F333333333338F33333003B3B3B3B3B3B30333
8FF3333333333338F33330B03B3B3B3B3B3B30338F8F3333333333338F3330BB
03B3B3B3B3B3B3038F33F3333333333338F330BBB03B3B3B3B3B3B308F333F33
33333333338F30BBBB03B3B3B3B3B3B08F3338F333333333338F30BBBBB03B3B
3B3B3B308F33333F88888888888F30BBBBBB0000000000008F333338FFFFFFFF
FFFF30BBBBBBBBBBBBB033338F3333333333338F333330BBBBBBBBBBBBB03333
8F3333333333338F333330BBBBBBBBBBBBB033338F3333333333338F333330BB
BBBBBBBBBBB033338F3333333338888F333330BBBBBBBBB0000033338F333333
338FFF833333330BBBBBBB033333333338F3333338F3333333333330BBBBB033
33333333338FFFFF8F3333333333333300000333333333333338888833333333
3333333333333333333333333333333333333333333333333333333333333333
33333333333333333333}
Layout = blGlyphTop
NumGlyphs = 2
ParentFont = False
Spacing = 7
OnClick = btnOpenClick
end
object btnSaveAll: TSpeedButton
Left = 67
Top = 15
Width = 30
Height = 30
Hint = 'Save All'
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Glyph.Data = {
06020000424D0602000000000000760000002800000028000000140000000100
0400000000009001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333300000000000000000333888888888888888
88F3306E60878008806E603338F338F3333338F338F330E6E078700870E6E033
38F338F3333338F338F3306E60878007806E603338F338F3333338F338F330E6
E078700870E6E03338F338F3333338F338F3306E60878787806E603338F338F3
333338F338F330E6E078787870E6E03338F338FFFFFFF8F338F3306E60000000
006E603338F338888888883338F330E6E6E6E6E6E6E6E03338F3333333333333
38F3306E6E6E6E6E6E6E603338F333333333333338F330E6E6E6E6E6E6E6E033
38F333333333333338F3306E6E6E6E6E6E6E603338F333333333333338F330E6
E6E6E6E6E6E6E03338F333333333333338F3306E6E6E6E6E6E6E603338F33333
3333333338F330E6E6E6E6E6E6E6E03338F333333333333338F3306E6E6E6E6E
6E6E603338F333333333333338F330E6E6E6E6E6E6E6E03338FFFFFFFFFFFFFF
F8F3300000000000000000333888888888888888883333333333333333333333
33333333333333333333}
Layout = blGlyphTop
NumGlyphs = 2
ParentFont = False
Spacing = 7
OnClick = mnuSaveAllClick
end
object btnDel: TSpeedButton
Left = 97
Top = 15
Width = 30
Height = 30
Hint = 'Delete selected note'
Enabled = False
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Glyph.Data = {
06020000424D0602000000000000760000002800000028000000140000000100
0400000000009001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333333333333333333333333333883333333383333333FFF33333333333
3333333008833333300833333F888F3333333333333333099088333309908333
383338F333338FF333333309990883309999083338F3388F3338F38F33333309
999088099999083338F33338F38F3338F33333309999009999908333338F3333
88F333338F33333309999999990833333338F3333F333338F333333330999999
9083333333338F333333338F333333333309999908833333333338F3333333F3
3333333333099999083333333333338F33338F33333333333099999908333333
3333333F33338F33333333330999999990833333333338F333338F3333333330
999900999908333333338F3338338F333333330999908809999033333338F333
8F3338F3333333099908333099990833338F3338F8F3338F3333333000833333
09990333338F338F338F3338F333333333333333309903333338FFF33338F333
8F33333333333333330033333333883333338FFFF83333333333333333333333
33333333333338888833}
Layout = blGlyphTop
NumGlyphs = 2
ParentFont = False
Spacing = 7
OnClick = btnDelClick
end
object btnPrn: TSpeedButton
Left = 128
Top = 15
Width = 30
Height = 30
Hint = 'Print selected note'
Enabled = False
Font.Color = clBtnText
Font.Height = -12
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Glyph.Data = {
06020000424D0602000000000000760000002800000028000000140000000100
0400000000009001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333333333333333000000000000000033FFFFFFFFFFFFFFFF
FFF3307777777777777777038333333333333333338330777777777777777703
38FFFFFFFFFFFFFFF833300000000000000000038F88888888888888888330F8
F8F8F8F8F8F8F8038F3333333333333338F3308F8F8F8F8F8F8F8F038F333333
3333333338F330F8F8F8F8F8F8F8F8038F3333333333333338F3308F8F8F8F8F
8F8F8F038FFFFFFFFFFFFFFFF8F3300000000000000000038888888888888888
888333330FFFFFFFFFF0333333338F333333338F333333330F00000F00F03333
33338F888883888F333333330FFFFFFFFFF0333333338F333333338F33333333
0FFFFFFFFFF0333333338FFFF38FFFFF333333330F000F000000333333338F88
83F8888F333333330FFFFF0FFF03333333338F3333F338F3333333330F000F0F
F033333333338F8883F38F33333333330FFFFF0F0333333333338FFFFFF8F333
3333333300000000333333333333888888883333333333333333333333333333
33333333333333333333}
Layout = blGlyphTop
NumGlyphs = 2
ParentFont = False
Spacing = 7
OnClick = btnPrnClick
end
object bt